home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / program / ddj0897.zip / DYN401.ZIP / kernel / metaclas.d < prev    next >
Text File  |  1996-08-20  |  655b  |  43 lines
  1. /*
  2.  *
  3.  *    Copyright (c) 1993-1996 Algorithms Corporation
  4.  *    3020 Liberty Hills Drive
  5.  *    Franklin, TN  37067
  6.  *
  7.  *    ALL RIGHTS RESERVED.
  8.  *
  9.  *
  10.  *
  11.  */
  12.  
  13. defclass MetaClass : Behavior;
  14.  
  15. objrtn    MetaClass_initialize(void)
  16. {
  17.     static    int    done = 0;
  18.  
  19.     /*  Class creation and some of the methods are initialized by
  20.         the kernel  */
  21.  
  22.     if (done)
  23.         return MetaClass_c;
  24.  
  25.     done = 1;
  26.  
  27. /*    MetaClass_c = gNewClass(Class, "MetaClass", 0, 0, Behavior, END);    */
  28.     return MetaClass_c;
  29.  
  30. }
  31.  
  32. /*
  33.  *
  34.  *    Copyright (c) 1993-1996 Algorithms Corporation
  35.  *    3020 Liberty Hills Drive
  36.  *    Franklin, TN  37067
  37.  *
  38.  *    ALL RIGHTS RESERVED.
  39.  *
  40.  *
  41.  *
  42.  */
  43.